function r=sucesion(k, t)
    x = 1;
    for i=0:k,
        x = g(g(x/2, t) + g(1/x, t), t);
    end
    r = x;
end
